home *** CD-ROM | disk | FTP | other *** search
/ Hyper Stacks 1994 May / Hyper Stacks (Pacific HiTech)(1994)[Mac].iso / Organization / HyperTree / card_20171.txt < prev    next >
Encoding:
Text File  |  1988-07-30  |  7.7 KB  |  349 lines
  1. -- card: 20171 from stack: in
  2. -- bmap block id: 4356
  3. -- flags: 0000
  4. -- background id: 17657
  5. -- name: Intro
  6. ----- HyperTalk script -----
  7. on mouseUp
  8.   repeat with x = 3 to number of card fields
  9.     hide card field x
  10.   end repeat
  11. end mouseUp
  12. on openStack
  13.   repeat with x = 3 to number of card fields
  14.     hide card field x
  15.   end repeat
  16. end openStack
  17.  
  18.  
  19. -- part 1 (field)
  20. -- low flags: 01
  21. -- high flags: 0000
  22. -- rect: left=153 top=56 right=95 bottom=352
  23. -- title width / last selected line: 0
  24. -- icon id / first selected line: 0 / 0
  25. -- text alignment: 1
  26. -- font id: 21
  27. -- text size: 12
  28. -- style flags: 0
  29. -- line height: 12
  30. -- part name: 
  31.  
  32.  
  33. -- part 3 (field)
  34. -- low flags: 01
  35. -- high flags: 0002
  36. -- rect: left=15 top=98 right=183 bottom=488
  37. -- title width / last selected line: 0
  38. -- icon id / first selected line: 0 / 0
  39. -- text alignment: 0
  40. -- font id: 21
  41. -- text size: 12
  42. -- style flags: 0
  43. -- line height: 14
  44. -- part name: 
  45.  
  46.  
  47. -- part 4 (button)
  48. -- low flags: 00
  49. -- high flags: 0000
  50. -- rect: left=207 top=239 right=261 bottom=231
  51. -- title width / last selected line: 0
  52. -- icon id / first selected line: 0 / 0
  53. -- text alignment: 1
  54. -- font id: 0
  55. -- text size: 12
  56. -- style flags: 0
  57. -- line height: 16
  58. -- part name: 
  59. ----- HyperTalk script -----
  60. on mouseUp
  61.   show card field "TreeField"
  62. end mouseUp
  63.  
  64.  
  65.  
  66. -- part 6 (button)
  67. -- low flags: 00
  68. -- high flags: 2000
  69. -- rect: left=34 top=186 right=216 bottom=64
  70. -- title width / last selected line: 0
  71. -- icon id / first selected line: 8538 / 8538
  72. -- text alignment: 1
  73. -- font id: 0
  74. -- text size: 12
  75. -- style flags: 0
  76. -- line height: 16
  77. -- part name: Find " "
  78. ----- HyperTalk script -----
  79. on mouseUp
  80.   show card field "Glass"
  81. end mouseUp
  82.  
  83.  
  84.  
  85. -- part 8 (button)
  86. -- low flags: 00
  87. -- high flags: 8001
  88. -- rect: left=171 top=274 right=319 bottom=245
  89. -- title width / last selected line: 0
  90. -- icon id / first selected line: 1004 / 1004
  91. -- text alignment: 1
  92. -- font id: 0
  93. -- text size: 12
  94. -- style flags: 0
  95. -- line height: 16
  96. -- part name: Read/Edit Story
  97. ----- HyperTalk script -----
  98. on mouseUp
  99.   show card field "Read/Edit"
  100. end mouseUp
  101.  
  102.  
  103.  
  104. -- part 10 (button)
  105. -- low flags: 00
  106. -- high flags: 8000
  107. -- rect: left=39 top=276 right=317 bottom=87
  108. -- title width / last selected line: 0
  109. -- icon id / first selected line: 3430 / 3430
  110. -- text alignment: 1
  111. -- font id: 0
  112. -- text size: 12
  113. -- style flags: 0
  114. -- line height: 16
  115. -- part name: Blank Card
  116. ----- HyperTalk script -----
  117. on mouseUp
  118.   show card field "New"
  119. end mouseUp
  120.  
  121.  
  122.  
  123. -- part 11 (button)
  124. -- low flags: 00
  125. -- high flags: 8000
  126. -- rect: left=351 top=235 right=274 bottom=409
  127. -- title width / last selected line: 0
  128. -- icon id / first selected line: 11645 / 11645
  129. -- text alignment: 1
  130. -- font id: 0
  131. -- text size: 12
  132. -- style flags: 0
  133. -- line height: 16
  134. -- part name: Create Cards
  135. ----- HyperTalk script -----
  136. on mouseUp
  137.   show card field "Create"
  138. end mouseUp
  139.  
  140.  
  141.  
  142. -- part 12 (button)
  143. -- low flags: 00
  144. -- high flags: 0000
  145. -- rect: left=24 top=217 right=229 bottom=40
  146. -- title width / last selected line: 0
  147. -- icon id / first selected line: 0 / 0
  148. -- text alignment: 1
  149. -- font id: 0
  150. -- text size: 12
  151. -- style flags: 0
  152. -- line height: 16
  153. -- part name: 
  154. ----- HyperTalk script -----
  155. on mouseUp
  156.   show card field "Arrow"
  157. end mouseUp
  158.  
  159.  
  160. -- part 13 (field)
  161. -- low flags: 81
  162. -- high flags: 0000
  163. -- rect: left=60 top=184 right=233 bottom=175
  164. -- title width / last selected line: 0
  165. -- icon id / first selected line: 0 / 0
  166. -- text alignment: 0
  167. -- font id: 3
  168. -- text size: 9
  169. -- style flags: 0
  170. -- line height: 11
  171. -- part name: Glass
  172.  
  173.  
  174. -- part 15 (field)
  175. -- low flags: 81
  176. -- high flags: 0000
  177. -- rect: left=242 top=222 right=271 bottom=359
  178. -- title width / last selected line: 0
  179. -- icon id / first selected line: 0 / 0
  180. -- text alignment: 0
  181. -- font id: 3
  182. -- text size: 9
  183. -- style flags: 0
  184. -- line height: 11
  185. -- part name: TreeField
  186.  
  187.  
  188. -- part 18 (field)
  189. -- low flags: 81
  190. -- high flags: 0000
  191. -- rect: left=225 top=275 right=313 bottom=405
  192. -- title width / last selected line: 0
  193. -- icon id / first selected line: 0 / 0
  194. -- text alignment: 0
  195. -- font id: 3
  196. -- text size: 9
  197. -- style flags: 0
  198. -- line height: 11
  199. -- part name: Read/Edit
  200.  
  201.  
  202. -- part 19 (field)
  203. -- low flags: 81
  204. -- high flags: 0000
  205. -- rect: left=75 top=275 right=309 bottom=192
  206. -- title width / last selected line: 0
  207. -- icon id / first selected line: 0 / 0
  208. -- text alignment: 0
  209. -- font id: 3
  210. -- text size: 9
  211. -- style flags: 0
  212. -- line height: 11
  213. -- part name: New
  214.  
  215.  
  216. -- part 20 (field)
  217. -- low flags: 81
  218. -- high flags: 0000
  219. -- rect: left=409 top=242 right=322 bottom=481
  220. -- title width / last selected line: 0
  221. -- icon id / first selected line: 0 / 0
  222. -- text alignment: 0
  223. -- font id: 3
  224. -- text size: 9
  225. -- style flags: 0
  226. -- line height: 11
  227. -- part name: Create
  228.  
  229.  
  230. -- part 22 (field)
  231. -- low flags: 81
  232. -- high flags: 0000
  233. -- rect: left=20 top=228 right=274 bottom=204
  234. -- title width / last selected line: 0
  235. -- icon id / first selected line: 0 / 0
  236. -- text alignment: 0
  237. -- font id: 3
  238. -- text size: 9
  239. -- style flags: 0
  240. -- line height: 11
  241. -- part name: Arrow
  242.  
  243.  
  244. -- part 23 (button)
  245. -- low flags: 80
  246. -- high flags: A003
  247. -- rect: left=13 top=27 right=184 bottom=491
  248. -- title width / last selected line: 0
  249. -- icon id / first selected line: 0 / 0
  250. -- text alignment: 1
  251. -- font id: 0
  252. -- text size: 12
  253. -- style flags: 0
  254. -- line height: 16
  255. -- part name: OK, return to previous card
  256. ----- HyperTalk script -----
  257. on mouseUp
  258.   hide button "OK, return to previous card"
  259.   repeat with x = 3 to the number of card fields
  260.     hide card field x
  261.   end repeat
  262.   pop card
  263. end mouseUp
  264.  
  265.  
  266.  
  267. -- part 25 (button)
  268. -- low flags: 00
  269. -- high flags: 0000
  270. -- rect: left=361 top=187 right=220 bottom=396
  271. -- title width / last selected line: 0
  272. -- icon id / first selected line: 1007 / 1007
  273. -- text alignment: 1
  274. -- font id: 0
  275. -- text size: 12
  276. -- style flags: 0
  277. -- line height: 16
  278. -- part name: Print
  279. ----- HyperTalk script -----
  280. on mouseUp
  281.   show card field "Print"
  282. end mouseUp
  283.  
  284.  
  285.  
  286. -- part 26 (field)
  287. -- low flags: 81
  288. -- high flags: 0000
  289. -- rect: left=393 top=189 right=245 bottom=477
  290. -- title width / last selected line: 0
  291. -- icon id / first selected line: 0 / 0
  292. -- text alignment: 0
  293. -- font id: 3
  294. -- text size: 9
  295. -- style flags: 0
  296. -- line height: 11
  297. -- part name: Print
  298.  
  299.  
  300. -- part contents for background part 6
  301. ----- text -----
  302. HyperTree‚Ñ¢
  303.  
  304.  
  305.  
  306. -- part contents for card part 1
  307. ----- text -----
  308. An Interactive Database
  309. For Your Family Genealogy
  310. by Joe Crnich, 1987
  311.  
  312.  
  313.  
  314. -- part contents for card part 3
  315. ----- text -----
  316. Family Tree is an interactive database with which you can compile genealogical information and generate various family trees. With it, you can include: narratives about your family members' lives, pertinent birth, death, marriage, and divorce information, and parental and sibling information. The buttons found in this stack are mostly intuitive. Click each of the following non-HyperCard-standard buttons to learn their functions:
  317.  
  318.  
  319. -- part contents for card part 13
  320. ----- text -----
  321. -The magnifying glass allows you to access the find command to find any name quickly
  322.  
  323. -Click the arrow to go to the card of the person named on the same line as the arrow
  324.  
  325.  
  326. -- part contents for card part 15
  327. ----- text -----
  328. -The tree button creates a family tree for the person on the same line as the button
  329.  
  330. -- part contents for card part 18
  331. ----- text -----
  332. -Click the read/edit button to read or edit the person's life story (Clicking this button will reveal a hide button)
  333.  
  334. -- part contents for card part 19
  335. ----- text -----
  336. -Click on the blank card button to create a blank personal record card
  337.  
  338. -- part contents for card part 20
  339. ----- text -----
  340. -Click in the create cards button to auto-create cards for spouses, parents, and siblings
  341.  
  342.  
  343. -- part contents for card part 22
  344. ----- text -----
  345. -Click the arrow to go to the card of the person named on the same line as the arrow (or on any person's name on the tree to go to that person's card)
  346.  
  347. -- part contents for card part 26
  348. ----- text -----
  349. The print button allows you to print one or more cards or a tree